home *** CD-ROM | disk | FTP | other *** search
/ 64'er 1990 November / 64er_Magazin_90-11_1990_Markt__Technik_de_Side_A.d64 / cave 112 (.txt) < prev    next >
Commodore BASIC  |  2022-10-26  |  1KB  |  21 lines
  1. 10 fori=0to17:reada$:print"[147]"a$:fors=0to39:poke8192+40*i+s,peek(1024+s):nexts:nexti
  2. 20 poke8787,57:fori=1to6:reada:poke8448+a,162:next:poke8799,224:poke8855,34:poke8828,34
  3. 30 data"@@@@@@@o[184][146]@@([146]@b([146]@j [146]@+ [146]@*p[146]b*t[146]j[218]@)[146][214]@[146]j[218]@[146]b*t[146]@"
  4. 40 data"*p[146]@+ [146]@j [146]@b([146]@@([146]@o[184][146]@@@@@@@@@@0@@0lc<ll7<l7":poke8510,224
  5. 50 data"<<m[220][220][146]m[220][176][146]m[215][176]m[221][192][146]c[213][192][146]=[183][176][183][146][221][188]o[213][223][146]@[221][146][176]c[215][176]m[181][176][146]o[213][204][146]3[223][146]":poke8842,34
  6. 60 data"[192][195][146]0[192][146]l00@[178][178][178][178][163][211][211]44444[195][211][211][211][162][162][210][161][161][161][161][210][162][211][211][163][211][210][210][162]":poke8532,34:poke8574,34
  7. 70 data"[162][163][163][212][212][213][197][197][212][212][164][179]bb[146][179][213]6[197][179][179][164][213][164][163][197][197][197][197][212][196][196][213][164][163][197][197][197][197][197][212]":poke8704,34:poke8707,34
  8. 80 data"[211][211][211][211][210][210][210][209][209][209][209][209][209][209][209][209][210][210][211][211][211][212][212][213][197][197][197][197][196][196]5[197][212][197][197][164][179][179][163][196]":poke8744,34:poke8834,34:poke8839,34
  9. 90 data"[212][179]b[146][163][212][178]a@p[146][177][161][161][177]pq[146][178]@@f[146]5)[146]pe[146]6 [146]l)[146]@q[146]5h[146]p[185]=@[146] )ox[165]"
  10. 100 data"5e[146]7%[146]6e[146]8p[146]b[166][146]8=@[146] [202][202][202][202]()[146] q[146]7h[208][185]%[146]5x[169]le[146]5p[146]b[166][146]6[168][168]@[146]"
  11. 110 data"[208][198])[184]e[146]5e[146]6d[146]7l[146] [208]l[146]![208] [146]g9$$y[146]![208]h[208][183])[176]m[146]@[208]m[146]b[208])[146][223]m[146]a[208][146]"
  12. 120 data")?m[146]c[208])s[146] [210][191])@m[184][146]gm[185][146]g [146]j9zzy[146][204]eh[208][183]-[146]a[220][201][175][208][185])s[146] [210]":sys8448
  13. 130 data"[191])[208]m[146]v[208])[146]cm[146]u[208]m[146]\[208])[191]m[146]x[212]m[146]@[212])[146]hm[146]a[212])hm[146]e[212])[146] m[146]d[212])[146]!m[146]"
  14. 140 data"d[212]-[146]_[208][146])c[208][185][185]a-[146]_[208][201][146]a[208][146]fn[184][146]g[204][215][146]![201][146]b[208][146]3n[185][146]g [146]@l[146]a[212]l[146]f[212])[146]"
  15. 150 data"*m[146]e[212])@m[146]d[212]n[146]d[212][146]@@[202][208][189]h[208][184]l[146]u[208])[192]m[146]v[208])[146]pm[146][217][217]l[146][216][216][204]@![166][146]"
  16. 160 data"7[166][146]7%[146]7[176][146]f)?[176][146]%[208],,[146]a=[146]@[220][146])o[201][146]m[208][146]ij[146]j*[190][146]a[208][146][204]33[201][146]n[208][146]hj[146]j*"
  17. 170 data"[255][146]a[208][146][202]*[202][146]p[223][223][146]@[166][146]6%[146]6[208][146][216]%[146]5e[146]6)[146]de[146]:)[146]@e[146]9 [146]'h1[146]9[200]q9h[208][183]="
  18. 180 data"@p [146]aq[146]9[168][168][146]l[208][146]bb@%[146]9x[169](e[146]9p[146]b[166][146]:[201][192][208][216]%[146]:[201][146]g[208][210]-[146][216][216]x[169]l"
  19. 190 data"m[146][216][216]p[146]c[174][146][217][217]-[146][217][217][201][146]v[208][146]i[166][146]5[166][146]5)[146]pm[146][217][217][204][193][146]!press fire[180][182][178][146]"
  20. 200 data"[177][190][187][187][146]@@@@@@(w) by dirk klingler@@@@@@@@@@":data0,193,236,277,312,355
  21.